home *** CD-ROM | disk | FTP | other *** search
/ The Complete Interactive…ermaid's Special Edition) / The Complete Interactive Cookbook - Mermaid's Special Edition [Compton's, 1999].iso / TOURGUID / COOKTG.DIR / 00015_Script_15 < prev    next >
Text File  |  1996-10-29  |  1KB  |  39 lines
  1. on startMovie
  2.   global marked, markedSprite, markedLoc, useRollOver
  3.   set markedSprite = 43
  4.   puppetsprite markedSprite, TRUE
  5.   set marked = FALSE
  6.   set markedLoc = point(433, 75)
  7.   set useRollOver to True
  8.   global BGScreenShotCastNum
  9.   set BGScreenShotCastNum = the number of cast "BG Screen Shot"
  10. end
  11.  
  12. on waitsound whichChannel
  13.   repeat while (soundBusy(whichChannel)) and not (the mouseDown)
  14.     updateStage
  15.   end repeat
  16.   checkPassClick
  17. end waitSound
  18.  
  19. on waitVideo whichSprite
  20.   set the movietime of sprite whichsprite = 0 -- REWIND
  21.   set the movierate of sprite whichsprite = 1 -- START PLAYING
  22.   repeat while (the movieRate of sprite whichSprite > 0) and not (the mouseDown) and not (the movietime of sprite whichSprite >= the duration of cast the castNum of sprite whichSprite)
  23.     updateStage
  24.   end repeat
  25.   checkPassClick
  26. end waitVideo
  27.  
  28. on checkPassClick
  29.   global gPaused, gContinued, PauseSprite
  30.   if gPaused then
  31.     if the clickon = PauseSprite then
  32.       continueDemo
  33.     end if
  34.   else if gContinued then
  35.     if the clickon = PauseSprite then
  36.       pauseDemo
  37.     end if
  38.   end if
  39. end